#!/usr/bin/perl
#This function decided whether the test case has passed or failed based on the loss percentage for no loss.
sub conclusion_for_no_loss{
	my($percentage_value) = @_;
	$flag_success_or_fail = 0;
	if ($percentage_value > 0){
		$flag_success_or_fail = 2;                    #if packet loss is greater than 0 then flagsf = 1 and this case is failed.
	}
	else{
		$flag_success_or_fail = 1;                    #if packet loss is equal to 0 excatly, flagsf = 2 and this test case passed.
	}
	return($flag_success_or_fail);
}
1;
